home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / lang / lisp / gcl-1.000 / gcl-1 / gcl-1.0 / cmpnew / cmpcall.h < prev    next >
Encoding:
C/C++ Source or Header  |  1994-05-10  |  7.5 KB  |  246 lines

  1.  
  2. static object LI1();
  3. static object LI5();
  4. static object LI6();
  5. static L9();
  6. static object LI15();
  7. static object LI1();
  8. #define VMB1 register object *base=vs_top; object  V18 ,V10; object Vcs[2];
  9. #define VMS1 vs_top += 2;
  10. #define VMV1 vs_reserve(2);
  11. #define VMR1(VMT1) vs_top=base ; return(VMT1);
  12. static object LI2();
  13. #define VMB2 register object *base=vs_top;
  14. #define VMS2  register object *sup=vs_top+1;vs_top=sup;
  15. #define VMV2 vs_reserve(1);
  16. #define VMR2(VMT2) vs_top=base ; return(VMT2);
  17. static object LI3();
  18. #define VMB3 register object *base=vs_top; object  V42 ,V41 ,V37 ,V36 ,V34;
  19. #define VMS3 vs_top += 4;
  20. #define VMV3 vs_reserve(4);
  21. #define VMR3(VMT3) vs_top=base ; return(VMT3);
  22. static object LI4();
  23. #define VMB4 register object *base=vs_top;
  24. #define VMS4 vs_top += 4;
  25. #define VMV4 vs_reserve(4);
  26. #define VMR4(VMT4) vs_top=base ; return(VMT4);
  27. static object LI5();
  28. #define VMB5 register object *base=vs_top; object  V67 ,V65; object Vcs[4];
  29. #define VMS5 vs_top += 2;
  30. #define VMV5 vs_reserve(2);
  31. #define VMR5(VMT5) vs_top=base ; return(VMT5);
  32. static object LI6();
  33. #define VMB6 register object *base=vs_top; object  V75 ,V74 ,V71; object Vcs[1];
  34. #define VMS6 vs_top += 3;
  35. #define VMV6 vs_reserve(3);
  36. #define VMR6(VMT6) vs_top=base ; return(VMT6);
  37. static object LI7();
  38. #define VMB7 register object *base=vs_top; object  V85;
  39. #define VMS7 vs_top += 2;
  40. #define VMV7 vs_reserve(2);
  41. #define VMR7(VMT7) vs_top=base ; return(VMT7);
  42. static object LI8();
  43. #define VMB8 object  V98 ,V97;
  44. #define VMS8
  45. #define VMV8
  46. #define VMR8(VMT8) return(VMT8);
  47. #define VC9
  48. static object LI10();
  49. #define VMB10 register object *base=vs_top; object  V124 ,V123 ,V119 ,V114;
  50. #define VMS10  register object *sup=vs_top+5;vs_top=sup;
  51. #define VMV10 vs_reserve(5);
  52. #define VMR10(VMT10) vs_top=base ; return(VMT10);
  53. static object LI11();
  54. #define VMB11 register object *base=vs_top; object  V158 ,V156 ,V155 ,V154 ,V153 ,V151 ,V145 ,V142;
  55. #define VMS11  register object *sup=vs_top+5;vs_top=sup;
  56. #define VMV11 vs_reserve(5);
  57. #define VMR11(VMT11) vs_top=base ; return(VMT11);
  58. static object LI12();
  59. #define VMB12 object  V173 ,V172 ,V171 ,V170 ,V169 ,V166;
  60. #define VMS12
  61. #define VMV12
  62. #define VMR12(VMT12) return(VMT12);
  63. static object LI13();
  64. #define VMB13 register object *base=vs_top;
  65. #define VMS13  register object *sup=vs_top+1;vs_top=sup;
  66. #define VMV13 vs_reserve(1);
  67. #define VMR13(VMT13) vs_top=base ; return(VMT13);
  68. static object LI14();
  69. #define VMB14 register object *base=vs_top; object  V197 ,V194 ,V193 ,V192 ,V191;
  70. #define VMS14  register object *sup=vs_top+7;vs_top=sup;
  71. #define VMV14 vs_reserve(7);
  72. #define VMR14(VMT14) vs_top=base ; return(VMT14);
  73. static object LI15();
  74. #define VMB15 object Vcs[4];
  75. #define VMS15
  76. #define VMV15
  77. #define VMR15(VMT15) return(VMT15);
  78. static object LI16();
  79. #define VMB16 register object *base=vs_top; object  V214 ,V213;
  80. #define VMS16 vs_top += 2;
  81. #define VMV16 vs_reserve(2);
  82. #define VMR16(VMT16) vs_top=base ; return(VMT16);
  83. static object LI17();
  84. #define VMB17 register object *base=vs_top; object  V227 ,V226;
  85. #define VMS17 vs_top += 3;
  86. #define VMV17 vs_reserve(3);
  87. #define VMR17(VMT17) vs_top=base ; return(VMT17);
  88. static object LI18();
  89. #define VMB18 register object *base=vs_top; object  V235;
  90. #define VMS18 vs_top += 2;
  91. #define VMV18 vs_reserve(2);
  92. #define VMR18(VMT18) vs_top=base ; return(VMT18);
  93. static object LI19();
  94. #define VMB19 object  V263 ,V262 ,V261 ,V259 ,V258 ,V255 ,V254 ,V253 ,V251 ,V250 ,V249 ,V245 ,V244;
  95. #define VMS19
  96. #define VMV19
  97. #define VMR19(VMT19) return(VMT19);
  98. static LC20();
  99. #define VC20 object  V266;
  100. static LC20();
  101. #define VM20 3
  102. #define VM19 0
  103. #define VM18 2
  104. #define VM17 3
  105. #define VM16 2
  106. #define VM15 0
  107. #define VM14 7
  108. #define VM13 1
  109. #define VM12 0
  110. #define VM11 5
  111. #define VM10 5
  112. #define VM9 3
  113. #define VM8 0
  114. #define VM7 2
  115. #define VM6 3
  116. #define VM5 2
  117. #define VM4 4
  118. #define VM3 4
  119. #define VM2 1
  120. #define VM1 2
  121. static char * VVi[149]={
  122. #define Cdata VV[148]
  123. (char *)(LI1),
  124. (char *)(LI2),
  125. (char *)(LI3),
  126. (char *)(LI4),
  127. (char *)(LI5),
  128. (char *)(LI6),
  129. (char *)(LI7),
  130. (char *)(LI8),
  131. (char *)(L9),
  132. (char *)(LI10),
  133. (char *)(LI11),
  134. (char *)(LI12),
  135. (char *)(LI13),
  136. (char *)(LI14),
  137. (char *)(LI15),
  138. (char *)(LI16),
  139. (char *)(LI17),
  140. (char *)(LI18),
  141. (char *)(LI19)
  142. };
  143. #define VV ((object *)VVi)
  144. static  LnkT147() ;
  145. static  (*Lnk147)() = LnkT147;
  146. static object  LnkTLI146() ;
  147. static object  (*LnkLI146)() = LnkTLI146;
  148. static  LnkT144() ;
  149. static  (*Lnk144)() = LnkT144;
  150. static object  LnkTLI143() ;
  151. static object  (*LnkLI143)() = LnkTLI143;
  152. static object  LnkTLI142() ;
  153. static object  (*LnkLI142)() = LnkTLI142;
  154. static int  LnkTLI141() ;
  155. static int  (*LnkLI141)() = LnkTLI141;
  156. static object  LnkTLI140() ;
  157. static object  (*LnkLI140)() = LnkTLI140;
  158. static object  LnkTLI139() ;
  159. static object  (*LnkLI139)() = LnkTLI139;
  160. static  LnkT138() ;
  161. static  (*Lnk138)() = LnkT138;
  162. static  LnkT137() ;
  163. static  (*Lnk137)() = LnkT137;
  164. static object  LnkTLI136() ;
  165. static object  (*LnkLI136)() = LnkTLI136;
  166. static object  LnkTLI135() ;
  167. static object  (*LnkLI135)() = LnkTLI135;
  168. static object  LnkTLI134() ;
  169. static object  (*LnkLI134)() = LnkTLI134;
  170. static object  LnkTLI133() ;
  171. static object  (*LnkLI133)() = LnkTLI133;
  172. static object  LnkTLI132() ;
  173. static object  (*LnkLI132)() = LnkTLI132;
  174. static object  LnkTLI131() ;
  175. static object  (*LnkLI131)() = LnkTLI131;
  176. static object  LnkTLI130() ;
  177. static object  (*LnkLI130)() = LnkTLI130;
  178. static  LnkT129() ;
  179. static  (*Lnk129)() = LnkT129;
  180. static object  LnkTLI128() ;
  181. static object  (*LnkLI128)() = LnkTLI128;
  182. static object  LnkTLI127() ;
  183. static object  (*LnkLI127)() = LnkTLI127;
  184. static object  LnkTLI126() ;
  185. static object  (*LnkLI126)() = LnkTLI126;
  186. static object  LnkTLI125() ;
  187. static object  (*LnkLI125)() = LnkTLI125;
  188. static object  LnkTLI124() ;
  189. static object  (*LnkLI124)() = LnkTLI124;
  190. static object  LnkTLI123() ;
  191. static object  (*LnkLI123)() = LnkTLI123;
  192. static  LnkT122() ;
  193. static  (*Lnk122)() = LnkT122;
  194. static object  LnkTLI121() ;
  195. static object  (*LnkLI121)() = LnkTLI121;
  196. static object  LnkTLI120() ;
  197. static object  (*LnkLI120)() = LnkTLI120;
  198. static object  LnkTLI119() ;
  199. static object  (*LnkLI119)() = LnkTLI119;
  200. static object  LnkTLI118() ;
  201. static object  (*LnkLI118)() = LnkTLI118;
  202. static object  LnkTLI117() ;
  203. static object  (*LnkLI117)() = LnkTLI117;
  204. static object  LnkTLI116() ;
  205. static object  (*LnkLI116)() = LnkTLI116;
  206. static object  LnkTLI115() ;
  207. static object  (*LnkLI115)() = LnkTLI115;
  208. static object  LnkTLI114() ;
  209. static object  (*LnkLI114)() = LnkTLI114;
  210. static object  LnkTLI113() ;
  211. static object  (*LnkLI113)() = LnkTLI113;
  212. static object  LnkTLI112() ;
  213. static object  (*LnkLI112)() = LnkTLI112;
  214. static object  LnkTLI111() ;
  215. static object  (*LnkLI111)() = LnkTLI111;
  216. static object  LnkTLI110() ;
  217. static object  (*LnkLI110)() = LnkTLI110;
  218. static object  LnkTLI109() ;
  219. static object  (*LnkLI109)() = LnkTLI109;
  220. static object  LnkTLI108() ;
  221. static object  (*LnkLI108)() = LnkTLI108;
  222. static object  LnkTLI107() ;
  223. static object  (*LnkLI107)() = LnkTLI107;
  224. static object  LnkTLI106() ;
  225. static object  (*LnkLI106)() = LnkTLI106;
  226. static object  LnkTLI105() ;
  227. static object  (*LnkLI105)() = LnkTLI105;
  228. static object  LnkTLI104() ;
  229. static object  (*LnkLI104)() = LnkTLI104;
  230. static object  LnkTLI103() ;
  231. static object  (*LnkLI103)() = LnkTLI103;
  232. static object  LnkTLI102() ;
  233. static object  (*LnkLI102)() = LnkTLI102;
  234. static object  LnkTLI101() ;
  235. static object  (*LnkLI101)() = LnkTLI101;
  236. static object  LnkTLI100() ;
  237. static object  (*LnkLI100)() = LnkTLI100;
  238. static object  LnkTLI99() ;
  239. static object  (*LnkLI99)() = LnkTLI99;
  240. static object  LnkTLI98() ;
  241. static object  (*LnkLI98)() = LnkTLI98;
  242. static object  LnkTLI97() ;
  243. static object  (*LnkLI97)() = LnkTLI97;
  244. static object  LnkTLI96() ;
  245. static object  (*LnkLI96)() = LnkTLI96;
  246.